﻿Public Class _Default
    Inherits System.Web.UI.Page

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load

    End Sub

    Protected Sub btncalculate_Click(ByVal sender As Object, ByVal e As EventArgs) Handles btncalculate.Click
        Dim int1 As Single
        Dim int2 As Single
        int1 = CSng(txtint1.Text)
        int2 = CSng(txtint2.Text)


        Dim answer As Single
        answer = int1 + int2

        lblsum.Text = answer
    End Sub
End Class